home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 December / macformat-019.iso / Shareware City / Developers / Gnuplot 3.5 for Macintosh / demo / simple.dem < prev    next >
Encoding:
Text File  |  1993-11-03  |  1.2 KB  |  46 lines  |  [TEXT/MSWD]
  1. #
  2. # $Id: simple.dem%v 3.38.2.53 1993/01/21 01:20:04 woo Exp woo $
  3. #
  4. # Requires data files "[123].dat" from this directory,
  5. # so change current working directory to this directory before running.
  6. # gnuplot> set term <term-type>
  7. # gnuplot> load 'simple.dem'
  8. #
  9. set samples 50
  10. plot [-10:10] sin(x),atan(x),cos(atan(x))
  11. pause -1 "Hit return to continue"
  12.  
  13. set samples 100
  14. plot [-pi/2:pi] cos(x),-(sin(x) > sin(x+1) ? sin(x) : sin(x+1))
  15. pause -1 "Hit return to continue"
  16.  
  17. set samples 200
  18. plot [-3:5] asin(x),acos(x)
  19. pause -1 "Hit return to continue"
  20.  
  21. plot [-30:20] besj0(x)*0.12e1 with impulses, (x**besj0(x))-2.5 with points
  22. pause -1 "Hit return to continue"
  23.  
  24. set samples 400
  25. plot [-10:10] real(sin(x)**besj0(x))
  26. pause -1 "Hit return to continue"
  27.  
  28. plot [-5*pi:5*pi] [-5:5] real(tan(x)/atan(x)), 1/x
  29. pause -1 "Hit return to continue"
  30.  
  31. set autoscale
  32. set samples 800
  33. plot [-30:20] sin(x*20)*atan(x)
  34. pause -1 "Hit return to continue"
  35.  
  36. plot [-19:19] '1.dat'with impulses ,'2.dat' ,'3.dat' with lines
  37. pause -1 "Hit return to continue"
  38. f(x) = x/100
  39. plot [-19:19] '1.dat'with impulses ,'2.dat' thru f(x) ,'3.dat' with lines
  40. pause -1 "Hit return to continue"
  41.  
  42. # undo what we have done above
  43. set samples 160
  44. set xrange [-10:10]
  45. set autoscale xy
  46.